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ABSTRACT 


The JMS Y - Interrupt Test determine if the PDP-15 will complete 
a JMS Y (where Y is some random value) instruction before it goes 
into program interrupt. This is done by setting an I/O flag and 
then transferring control to an lON/JMS Y instruction group (which 
is located at some random place in memory) . The computer should 
complete the JMS Y plus the next instruction before the computer 
goes into progreun interrupt. If no error occurs, the lON/JMS Y 
instruction group is moved to other random memory locations and 
the test is repeated. Errors are indicated to the operator via 
the Teletype or error halts. 

REQUIREMENTS 

Equipment 

Standard PDP-15 Computer. 

Storage 

The progrcim uses all of 4K memory for the program or as a test 
area. The program occupies memory from location 07300 to 07711 
aiad tests all locations below 07277. 

Preliminary Programs 


Basic Instruction Tests 



3. 


LOADING PROCEDURE 


3.1 Method 

a. Put HRI tape of program in reader (high speed if available) 

b. Set ADDRESS SWITCHES to 07300; the BANK MODE switch on a 1. 

c. Depress and release READ IN key 

4. STARTING PROCEDURE 

4 . 1 Control Switch Settings 


The following is a table of ACCUMULATOR SWITCH settings and their 
action in the program. 


AC Switch 
0 
1 
2 

3 

4 


Set As 

1 

0 

1 

0 

1 

0 

1 

0 

1 

0 


Action 

Halt on error. 

Don't halt on error. 

Don't print error. 

Print errors. 

Ring bell on error 
Ring bell after N passes. 

Loop on current Y. 

Don't loop on current Y. 

Loop on current location. 

Don ' t loop on current location 


N is an arbitrary number (initially lOOg) which is controlled by 
the LAW-N instruction in location 07300 and may be changed at the 
operator's discretion. 


4 . 2 Starting Address 

The starting address of the program is 07300. 

4 . 3 Program and/or Operator Action 

a. Set ADDRESS SWITCHES to 07300. 

b. Set ACCUMULATOR SWITCHES to desired positions (see section 4.1) 
Normal setting is 500000. 


c. Depress I/O RESET. 

d. Depress START. 

5. OPERATING PROCEDURE 

See Section 4.1. 

5 . 1 Subroutine Abstracts 

None. 

5.2 Program and/or Operator Action 

To put the program in the scope mode, the ACCUMULATOR SWITCH RE- 
GISTER should be set to 260000 (don't halt, don't print, bell after 
N passes, loop on current Y, loop on current location). 

6. ERRORS 

Unless AC switch 1 is a 1, errors will be printed on Teletype. 

6 . 1 Error Halts and Description 

There is one error halt inside the program at location 07507. Any 
program diagnosed errors will cause a halt at this location if AC 
switch 0 is a 1. The program stores HALT in all locations of the 
test area of memory. If the computer does not go into program 
interrupt immediately after executing the next instruction (a NOP) 
after the JMS Y, the computer will halt at location Y + 2. 

6 . 2 Error Recovery 



6.2.1 Program Diagnosed Error 


If AC switch 0 is a 1, the computer will halt on a diagnosed error. 
To recover from this type of error, reset AC switches 0 to 4 as 
necessary, (see section 4.1) and then depress CONTINUE. 

6.2.2 Interrupt Failures 

Interrupt failures will cause a halt at location Y + 1. To recover, 
reset AC switches 0 to 4 as necessary (see section 4.1) and then 
start the computer at location 07300 (BEGIN) after depressing I/O 
RESET. 

6.2.3 Test for ION, JMS Y, and Y 

To test particular memory locations for the ION, JMS Y, and/or Y, 
store the address of the ION in location 0f7672 (POINTl) , that 
address +1 in location jy7673(POINT2) , the address Y in location 
Jf7674 (POINT3) . Then set AC switches 3 and 4 to 1, depress I/O 
RESET, and start the computer at location 07300 (BEGIN). Y and 
location of ION must be less than 07277 and not 00000 or 00001. 



6.3 Error Switch Hierarchy 
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6 . 4 Error Typeout Example 



lON-JMS Y 

JMS AT "Y" 

C{0) 

C(Y) 

001234 007654 

001235 

740040 


The above excuaple shows that a JMS 765 4 instruction was stor'id 
in location 1234 (it is implied that the lOi: is in 1222; . The 1222 
stored in location 00000 as well as the 740040 (HLT) in Y indicates 
the JMS was not completed before the computer went into program 
interrupt. 



MISCELLANEOUS 


Execution Time 

Approximately 96 ms per lON/JMS Y instruction group. 

PROGRAM DESCRIPTION 

a. The first function that is performed is that of initialization. 

A register to count loops and a location to assure typeout of 
the error message header are initialized, and the bell on the 
Teletype is rung to raise the teleprinter flag to assure a 
flag for program interrupt. 

b. Then a check is made to see if the locations of the ION and JMS Y 
instructions should be changed (switch 4) . If they are not 
changed, the program proceeds to c. If they are, a number is 
obtained from a random number generator, made into an address 

and checked that it is below the program, not equal to Y or Y + 1, 
not equal to 00000 or 00001, and stored in Point 1 and incre- 
mented and stored in POINT2. 

c. Then a check is made to see if the number Y should be changed 
(switch 3) . If it is not, the program proceeds to d. If it 
is, a number is obtained from a different random number genera- 
tor than was used in b, made into an address, checked to see 
that it was at least 2 below the program, not equal to the 
location of ION or JMS Y instructions, not equal to 00000 or 
000001, and stored in POINT3. 



d. Then HALT is stored in all memory locations in the test area 

of memory. The ION instruction is stored, as well as the JMS Y 
instruction after it has been formed from Y and JMS. The AC 
and Link are then cleared and control is transferred to the 
ION/ JMS Y instruction group. 

e. Upon return from the program interrupt, the contents of location 
Y are checked as well as the contents of location 00000 to make 
sure the proper numbers were stored in these locations. If not, 
the error subroutine is called. 

f. A check is then made to see if the SCOPE mode (AC switches 3 
and 4 a 1) has been requested and if so, control is immediately 
transferred back to the instruction group. 

g. If the instruction group is not being SCOPED, a check is made 
on ringing the bell (switch 2) after which control goes back 
to b. 



IONJms MAC 15 


9 .JAN »73 


23136 PACE 1 


VS*? 


.TITLE lONjMS 

/COP^RIGWT 1969 , digital E 0 UIP*^E‘’T C^RP.i MAVNARn, ^ 4 S 5 , 
/REVISED NOVfMPER 7, 1972 E4RL L. BOy^E 
/UPDATED PROCRAM TO ACCO'^OCATE ECO #? 0 ', 


/ 

/JM5 ybImtcrrupt Test 
/ 


,ABS 



000200 


,L 0 C 0200 



/CHECK 

ACS against 

0020 P 

750004 

check 

LAS 


P 0201 

507602 


AND 

KONST 

00202 

047603 


OAC 

CTEMP 

00203 

200000 


LAC 

0 

00204 

04 T 604 


OAC 

SAV 0 

00205 

50 T 602 


AND 

KONST 

00206 

547603 


SAD 

CTCMP 

00207 

607400 


JMR 

SEOIN 

00210 

607552 


JMP 

ERROR 


007400 


,LOC 7400 

07400 

207605 

BEGIN 

LAC 

1740000 

07401 

047564 


OAC 

COUNT 

07402 

760207 


law 

207 

07403 

700406 


TLS 


07404 

700401 


T 8 P 


07405 

607404 


JMP 

• rI 

07406 

107517 

HERCI 

JMS 

random 

07407 

507567 


AND 

MASK 

07410 

047573 


OAC 

POINTI 

07411 

047574 


OAC 

P 0 INT 2 

07412 

447574 


ISI 

R 0 INT 2 

07413 

741200 


SNA 


07414 

607406 


JMP 

HEREl 

07415 

547570 


SAO 

ONE 

07416 

607406 


JMP 

HCRCi 

07417 

547576 


TAO 

UPLIM 

07420 

740100 


8 HA 


07421 

60 t 406 


JMP 

HCRCI 

07422 

107574 


LAO 

R 01 NT 2 

07423 

347576 


TAO 

UPLIM 

07424 

740100 


SMA 


07425 

607406 


JMP 

HEREl 

07426 

207575 


LAO 

POINTS 

07427 

547573 


SAO 

POINTI 

07430 

607406 


JMP 

HEREl 

07431 

547574 


SAO 

P 0 INT 2 

07432 

607406 


JMP 

HEREl 

07433 

347570 


TAO 

one 

07434 

547573 


SAO 

POINTI 

07435 

607406 


JMP 

HEREl 


.EJECT 


/SET UP TO COUNT LOOPS 
/RING BELL TO SET UP I?0 fLAG 


/generate random abdRess 

/STORE IN PJON" POINTER 
/STORE IN »»JMS Y" POINTER 
/AND INCREMENT 
/IS " 10 N'»lSt 
/YES 

/HOW about if 

/YES 

/IS the "ION" pointer 
/INSIDE THIS PR 08 RIMT 

/YiSi scneratc another 

/NOi NOW HOW ABOUT 

/THE RJMS Y» POINTER 
/IS IT OKT 

/NOi TRY again 

/OK SO FAR, NOW IS »VR POINTER 
/equal to "ION" POlNTERf 
/YES 

/NO, EQUAL TO "JMS Y" POINTER! 

/YES 

/AOO 1 AND CHECK 
/TWAT there is at least 

/ONE LOCATION SETWEE^' "Y" * ”ION" 



’ JONjmS maCI? V59 9•JA^'■73 7(Z\Z6 


fli7436 

107540 

WERE2 

JMS RaNOUM 

(?7A37 

507567 


AND MASK 

?<744<? 

M75T5 


DAC POINTS 

?7441 

T41200 


SNA 

^7«42 

*07436 


JMP HERE2 

^*744? 

5475T0 


SAD one 

917444 

607436 


JMP HERE2 

917445 

347600 


TAD UPLIM2 

5^7446 

T40100 


SMA 

!^7447 

*07436 


JMP HERE2 

917450 

2075T5 


LAC P0INT3 

?7451 

547573 


SAD PQINTI 

P745? 

607436 


JMP WEPE2 

P 7453 

547574 


SAD P0INT2 

917454 

607436 


JMP WERE2 

P7*55 

347570 


TAD ONE 

P7456 

947573 


SAO POINTl 

P 7457 

607436 


JMP WERE2 

074^0 

107513 

HERE3 

JMS ualT 

P7461 

207569 


LAC IONCON 

P7462 

067573 


OAC# POINT! 

07463 

207975 


LAC POINTS 

07464 

247566 


VOR JM8C0N 

07465 

067974 


OAC# P0INT2 

07466 

T54000 


CLAjCUL 

07467 

627573 


JMP# POINT! 

07470 

207574 

RETURN 

LAC P01NT2 

07471 

347970 


TAD ONE 

07472 

047601 


OAC VARI 

07473 

227975 


LAC# POINTS 

07474 

907967 


AND MASK 

07475 

547601 


SAO VARI 

07476 

74i000 


SKP 

07477 

6075P4 


JMP ERRCON 

07500 

200000 


LAC 0 

07501 

907567 


AND mask 

07902 

947606 


SAO (ERROR 

07903 

741000 


SKP 

07904 

607592 

ERRCON 

JMP ERROR 

07509 

207604 


LAC 5AV0 

07906 

741100 


SPA 

07907 

607990 


JMP DONE 

07910 

447964 


I8I COUNT 

07911 

607406 


JMP heREI 

07912 

607990 


JMP DONE 
.EJECT 


PAGE 2 

/YES, 5EMERATE RANSOM ADSRES^ 

/a^-'d store im point J 
/IS '*y”»P7 

/YES 

/HOW APQUT 1? 

/VES 

/IS "Y" INSIDE PROGRAM QR 
/riRST location repore 
/YES 

/OK SO FAR NOW IS «Y” P0!NT£R 
/EQUAL TO ”ION" pointer 
/YES 

/NO, EQUAL TO “JMS Y« POINTER 
/YES 

/ADO 1 AND CWECK 
/TWAT there is at L'EAST 

/ONE LOCATION between hy” * "ION" 

/STORE ”JHP eRRQRR IN MgMoRY 

/THEN the ion via 

/nIONw pointer 
/get pyp 

/FORM JMS "Y" 

/STORE VIA "JMS Y" POINTER 
/clear AC « L 
/EXECUTE lON-JMS Y 
/GET LOCATION or JHS 
/FORM address stored IN "Y" 


/YES, all ok 

/TWE /PC' saved on The /’Jms' is wrong, 

/get the iPQ/ SAVEO ON t«l INfERPuPT, 

/MASK OUT THE ADDRESS*, 

/8W0UL0 EQUAL /ERROR/ SUlROgTtNE aOOR, 

/YES 

/THE /PC' SAVED ON m INtlR»URt IS WRONO‘, 


/DONE ENOWOHt 

/NO 

/YES 



